a:=[3,2,1,0];
b:=a;
c:=listp(a);
d:=listp(b);
e:=cons(3,[1,2]);
f:=listp(e);
g:=5;
h:=listp(g)